<?php

namespace app\db\library;

use app\common\library\Token;
use app\db\model\DbUsercare;
use app\db\model\DbUsercareAuth;
use app\db\model\DbUsercareRelation;
use fast\Random;
use think\Config;
use think\Db;
use think\Exception;
use think\Hook;
use think\Request;
use think\Session;
use think\Validate;

class Auth
{
    protected static $instance = null;
    protected $_error = '';
    protected $_logined = false;
    protected $_usercare = null;
    protected $_token = '';
    //Token默认有效时长
    protected $keeptime = 2592000;
    protected $requestUri = '';
    protected $rules = [];
    //默认配置
    protected $config = [];
    protected $options = [];
    protected $allowFields = ['id', 'account', 'name', 'sex', 'birthday', 'tel', 'heading_img', 'email', 'id_card_number', 'province', 'city', 'area', 'hospital', 'department', 'titles', 'rank', 'education', 'specialty', 'state', 'status', 'successions', 'maxsuccessions', 'prevtime', 'logintime', 'loginip', 'token', 'create_type', 'default_database_show_id', 'is_edit_pwd', 'job_number', 'create_time', 'update_time'];

    public function __construct($options = [])
    {
        if ($config = Config::get('user')) {
            $this->config = array_merge($this->config, $config);
        }
        $this->options = array_merge($this->config, $options);
    }

    /**
     *
     * @param array $options 参数
     * @return Auth
     */
    public static function instance($options = [])
    {
        if (is_null(self::$instance)) {
            self::$instance = new static($options);
        }

        return self::$instance;
    }

    /**
     * 获取UserCare模型
     * @return UserCare
     */
    public function getUserCare()
    {
        return $this->_usercare;
    }

    /**
     * 兼容调用user模型的属性
     *
     * @param string $name
     * @return mixed
     */
    public function __get($name)
    {
        return $this->_usercare ? $this->_usercare->$name : null;
    }

    /**
     * 兼容调用user模型的属性
     */
    public function __isset($name)
    {
        return isset($this->_usercare) ? isset($this->_usercare->$name) : false;
    }

    /**
     * 根据Token初始化
     *
     * @param string $token Token
     * @return boolean
     */
    public function init($token)
    {
        if ($this->_logined) {
            return true;
        }
        if ($this->_error) {
            return false;
        }
        $data = Token::get($token);
        if (!$data) {
            return false;
        }
        $user_id = intval($data['user_id']);
        if ($user_id > 0) {
            $usercare = DbUsercare::get($user_id);
            if (!$usercare) {
                $this->setError('Account not exist');
                return false;
            }
            if ($usercare['status'] != '1') {
                $this->setError('Account is locked');
                return false;
            }
            $this->_usercare = $usercare;
            // $this->_logined  = true;
            $this->_token    = $token;

            //初始化成功的事件
            Hook::listen("user_init_successed", $this->_usercare);
            return true;
        } else {
            $this->setError('You are not logged in');
            return false;
        }
    }

    /**
     * 注册用户
     *
     * @param string $username 用户名
     * @param string $password 密码
     * @param string $email 邮箱
     * @param string $mobile 手机号
     * @param array $extend 扩展参数
     * @return boolean
     */
    public function register($username, $password, $email = '', $mobile = '', $extend = [])
    {
        // 检测用户名、昵称、邮箱、手机号是否存在
        if (User::getByUsername($username)) {
            $this->setError('Username already exist');
            return false;
        }
        if (User::getByNickname($username)) {
            $this->setError('Nickname already exist');
            return false;
        }
        if ($email && User::getByEmail($email)) {
            $this->setError('Email already exist');
            return false;
        }
        if ($mobile && User::getByMobile($mobile)) {
            $this->setError('Mobile already exist');
            return false;
        }

        $ip   = request()->ip();
        $time = time();

        $data               = [
            'username' => $username,
            'password' => $password,
            'email'    => $email,
            'mobile'   => $mobile,
            'level'    => 1,
            'score'    => 0,
            'avatar'   => '',
        ];
        $params             = array_merge($data, [
            'nickname'  => preg_match("/^1[3-9]{1}\d{9}$/", $username) ? substr_replace($username, '****', 3, 4) : $username,
            'salt'      => Random::alnum(),
            'jointime'  => $time,
            'joinip'    => $ip,
            'logintime' => $time,
            'loginip'   => $ip,
            'prevtime'  => $time,
            'status'    => 'normal'
        ]);
        $params['password'] = $this->getEncryptPassword($password, $params['salt']);
        $params             = array_merge($params, $extend);

        //账号注册时需要开启事务,避免出现垃圾数据
        Db::startTrans();
        try {
            $user = User::create($params, true);

            $this->_usercare = User::get($user->id);

            //设置Token
            $this->_token = Random::uuid();
            Token::set($this->_token, $user->id, $this->keeptime);

            //设置登录状态
            // $this->_logined = true;

            //注册成功的事件
            Hook::listen("user_register_successed", $this->_usercare, $data);
            Db::commit();
        } catch (Exception $e) {
            $this->setError($e->getMessage());
            Db::rollback();
            return false;
        }
        return true;
    }

    /**
     * 用户登录
     *
     * @param string $account 账号,用户名、邮箱、手机号
     * @param string $password 密码
     * @return boolean
     */
    public function login($account, $password)
    {
        $field    = Validate::regex($account, '/^1\d{10}$/') ? 'tel' : 'account';  //验证
        $usercare = DbUsercare::get([$field => $account, 'status' => 1]);
        if (!$usercare) {
            $this->setError('Account not exist');
            return false;
        }

        if ($usercare->status != '1') {   //判断是否禁用
            $this->setError('Account not exist');
            return false;
        } elseif ($usercare->state != '1') {
            $this->setError('Account is locked');
            return false;
        }
        if ($usercare->pwd != $this->getEncryptPassword($password, $usercare->salt)) {
            $this->setError('Password is incorrect');
            return false;
        }

        //直接登录会员
        $this->direct($usercare->id);

        return true;
    }

    /**
     * 退出
     *
     * @return boolean
     */
    public function logout()
    {
        if (!$this->_logined) {
            $this->setError('You are not logged in');
            return false;
        }
        //设置登录标识
        $this->_logined = false;
        //删除Token
        Token::delete($this->_token);
        Session::delete("usercare_info");
        //退出成功的事件
        Hook::listen("user_logout_successed", $this->_usercare);
        return true;
    }

    /**
     * 修改密码
     * @param string $newpassword 新密码
     * @param string $oldpassword 旧密码
     * @param bool $ignoreoldpassword 忽略旧密码
     * @return boolean
     */
    public function changepwd($newpassword, $oldpassword = '', $ignoreoldpassword = false)
    {
        if (!$this->_logined) {
            $this->setError('You are not logged in');
            return false;
        }
        //判断旧密码是否正确
        if ($this->_usercare->pwd == $this->getEncryptPassword($oldpassword, $this->_usercare->salt) || $ignoreoldpassword) {
            Db::startTrans();
            try {
                $salt        = Random::alnum();
                $newpassword = $this->getEncryptPassword($newpassword, $salt);
                $this->_usercare->save(['loginfailure' => 0, 'pwd' => $newpassword, 'salt' => $salt]);

                Token::delete($this->_token);
                //修改密码成功的事件
                Hook::listen("user_changepwd_successed", $this->_usercare);
                Db::commit();
            } catch (Exception $e) {
                Db::rollback();
                $this->setError($e->getMessage());
                return false;
            }
            return true;
        } else {
            $this->setError('Password is incorrect');
            return false;
        }
    }

    /**
     * 直接登录账号
     * @param int $usercare_id
     * @return boolean
     */
    public function direct($usercare_id)
    {
        $usercare = DbUsercare::get($usercare_id);
        if ($usercare) {
            Db::startTrans();
            try {
                $ip   = request()->ip();
                $time = time();

                //判断连续登录和最大连续登录
                if ($usercare->logintime < \fast\Date::unixtime('day')) {
                    $usercare->successions    = $usercare->logintime < \fast\Date::unixtime('day', -1) ? 1 : $usercare->successions + 1;
                    $usercare->maxsuccessions = max($usercare->successions, $usercare->maxsuccessions);
                }

                $usercare->prevtime = $usercare->logintime;
                //记录本次登录的IP和时间
                $usercare->loginip   = $ip;
                $usercare->logintime = $time;
                //重置登录失败次数
                $usercare->loginfailure = 0;

                $this->_usercare = $usercare;

                $this->_token = Random::uuid();

                $usercare->token =  $this->_token;
                $usercare->save();
                Token::set($this->_token, $usercare->id, $this->keeptime);

                // $this->_logined = true;

                //登录成功的事件
                Hook::listen("user_login_successed", $this->_usercare);
                Session::set('usercare_info',$this->_usercare);
                Db::commit();
            } catch (Exception $e) {
                Db::rollback();
                $this->setError($e->getMessage());
                return false;
            }
            return true;
        } else {
            return false;
        }
    }

    /**
     * 检测是否是否有对应权限
     * @param string $path 控制器/方法
     * @param string $module 模块 默认为当前模块
     * @return boolean
     */
    public function check($path = null, $module = null)
    {
        if (!$this->_logined) {
            return false;
        }
        $uid      = $this->_usercare->id;
        $rulelist = $this->getRuleList($uid, session('_database_id'));
        $url      = ($module ? $module : request()->module()) . '/' . (is_null($path) ? $this->getRequestUri() : $path);
        $url      = strtolower(str_replace('.', '/', $url));
        return in_array($url, $rulelist) ? true : false;
    }

    // /**
    //  * 判断是否登录
    //  * @return boolean
    //  */
    // public function isLogin()
    // {
    //     if ($this->_logined) {
    //         return true;
    //     }
    //     return false;
    // }

    /**
     * 检测是否登录
     *
     * @return boolean
     */
    public function isLogin()
    {
        if ($this->_logined) {
            return true;
        }
        $usercare = Session::get('usercare_info');

        if (!$usercare) {
            return false;
        }

        //判断是否同一时间同一账号只能在一个地方登录
        if (Config::get('fastadmin.login_unique')) {
            $my = DbUsercare::get($usercare['id']);
            if (!$my || $my['token'] != $usercare['token']) {
                $this->_logined = false; //重置登录状态
                Session::delete("usercare_info");
                // Cookie::delete("keeplogin");
                return false;
            }
        }
        //判断管理员IP是否变动
        if (Config::get('fastadmin.loginip_check')) {
            if (!isset($usercare['loginip']) || $usercare['loginip'] != request()->ip()) {
                $this->logout();
                return false;
            }
        }
        $this->_logined = true;
        return true;
    }

    /**
     * 获取当前Token
     * @return string
     */
    public function getToken()
    {
        return $this->_token;
    }

    /**
     * 获取医生基本信息
     */
    public function getUsercareinfo($field = "", $token = false)
    {
        if ($field) {
            $this->setAllowFields($field);
        }
        $data         = $this->_usercare->toArray();
        $allowFields  = $this->getAllowFields();
        $usercareinfo = array_intersect_key($data, array_flip($allowFields));
        if (array_key_exists('heading_img', $usercareinfo)) {
            $usercareinfo['heading_img'] = $usercareinfo['heading_img'] ? (isHTTPS() ? 'https://' : 'http://') . $_SERVER['HTTP_HOST'] . $usercareinfo['heading_img'] : "";
        }
        if ($field && count($allowFields) == 1) {//只查一个字段
            $usercareinfo = $usercareinfo[$field];
        }
        if ($token) {
            $usercareinfo = array_merge($usercareinfo, Token::get($this->_token));
        }
        return $usercareinfo;
    }

    /**
     * 获得权限规则列表
     * @param int $uid 用户id
     * @return array
     */
    public function getRuleList($uid, $database_id)
    {
        // if (Session::has('_db_rule_list_' . $uid . '_' . $database_id)) {
        //     return Session::get('_db_rule_list_' . $uid . '_' . $database_id);
        // }
        // 读取用户规则节点
        $ids = $this->getRuleIds($uid, $database_id);
        // 筛选条件
        $where = [
            'status' => '1',
            'id'     => ['in', $ids]
        ];
        //读取用户组所有权限规则
        $this->rules = DbUsercareAuth::where($where)->field('id,pid,rule,name,ismenu')->select();
        //循环规则，判断结果。
        $rulelist = [];
        foreach ($this->rules as $rule) {
            //只要存在就记录
            $rules = explode(',',strtolower($rule['rule']));
            $rulelist = array_merge($rulelist,$rules);
        }
        //规则列表结果保存到session
        // Session::set('_db_rule_list_' . $uid . '_' . $database_id, $rulelist);
        return array_unique($rulelist);
    }

    public function getRuleIds($uid, $database_id)
    {
        //读取用户所属用户组
        $rules = DbUsercareRelation::where(['usercare_id' => $uid, 'database_id' => $database_id])->value('relation_auth');
        //保存用户所属用户组设置的所有权限规则id
        $ids = explode(',', $rules);
        $ids = array_unique($ids);
        return $ids;
    }


    /**
     * 获取当前请求的URI
     * @return string
     */
    public function getRequestUri()
    {
        return $this->requestUri;
    }

    /**
     * 设置当前请求的URI
     * @param string $uri
     */
    public function setRequestUri($uri)
    {
        $this->requestUri = $uri;
    }

    /**
     * 获取允许输出的字段
     * @return array
     */
    public function getAllowFields()
    {
        if (is_array($this->allowFields)) {
            return $this->allowFields;
        } else {
            return $this->allowFields = explode(',', $this->allowFields);
        }

    }

    /**
     * 设置允许输出的字段
     * @param array $fields
     */
    public function setAllowFields($fields)
    {
        $this->allowFields = $fields;
    }

    /**
     * 删除一个指定会员
     * @param int $usercare_id 会员ID
     * @return boolean
     */
    public function delete($usercare_id)
    {
        $usercare = User::get($usercare_id);
        if (!$usercare) {
            return false;
        }
        Db::startTrans();
        try {
            // 删除会员
            User::destroy($usercare_id);
            // 删除会员指定的所有Token
            Token::clear($usercare_id);

            Hook::listen("user_delete_successed", $usercare);
            Db::commit();
        } catch (Exception $e) {
            Db::rollback();
            $this->setError($e->getMessage());
            return false;
        }
        return true;
    }

    /**
     * 获取密码加密后的字符串
     * @param string $password 密码
     * @param string $salt 密码盐
     * @return string
     */
    public function getEncryptPassword($password, $salt = '')
    {
        return md5(md5($password) . $salt);
    }

    /**
     * 检测当前控制器和方法是否匹配传递的数组
     *
     * @param array $arr 需要验证权限的数组
     * @return boolean
     */
    public function match($arr = [])
    {
        $request = Request::instance();
        $arr     = is_array($arr) ? $arr : explode(',', $arr);
        if (!$arr) {
            return false;
        }
        $arr = array_map('strtolower', $arr);
        // 是否存在
        if (in_array(strtolower($request->action()), $arr) || in_array('*', $arr)) {
            return true;
        }

        // 没找到匹配
        return false;
    }

    /**
     * 设置会话有效时间
     * @param int $keeptime 默认为永久
     */
    public function keeptime($keeptime = 0)
    {
        $this->keeptime = $keeptime;
    }

    /**
     * 渲染用户数据
     * @param array $datalist 二维数组
     * @param mixed $fields 加载的字段列表
     * @param string $fieldkey 渲染的字段
     * @param string $renderkey 结果字段
     * @return array
     */
    public function render(&$datalist, $fields = [], $fieldkey = 'user_id', $renderkey = 'userinfo')
    {
        $fields = !$fields ? ['id', 'nickname', 'level', 'avatar'] : (is_array($fields) ? $fields : explode(',', $fields));
        $ids    = [];
        foreach ($datalist as $k => $v) {
            if (!isset($v[$fieldkey])) {
                continue;
            }
            $ids[] = $v[$fieldkey];
        }
        $list = [];
        if ($ids) {
            if (!in_array('id', $fields)) {
                $fields[] = 'id';
            }
            $ids        = array_unique($ids);
            $selectlist = User::where('id', 'in', $ids)->column($fields);
            foreach ($selectlist as $k => $v) {
                $list[$v['id']] = $v;
            }
        }
        foreach ($datalist as $k => &$v) {
            $v[$renderkey] = isset($list[$v[$fieldkey]]) ? $list[$v[$fieldkey]] : null;
        }
        unset($v);
        return $datalist;
    }

    /**
     * 设置错误信息
     *
     * @param $error 错误信息
     * @return Auth
     */
    public function setError($error)
    {
        $this->_error = $error;
        return $this;
    }

    /**
     * 获取错误信息
     * @return string
     */
    public function getError()
    {
        return $this->_error ? __($this->_error) : '';
    }
}
